﻿Public Class DocumentoClienteAlmacenDetalle

    Dim _CIAC, _SUCC, _TDOCC, _DCICOD, _CLICOD As String
    Dim _DCDCOD As Integer
    Dim _CIAA, _SUCA, _TDOCA, _DCACOD As String
    Dim _DADCOD As Integer
    Dim _ALMCOD As String

    Sub New()

    End Sub

    Sub New(ciac As String, succ As String, tdocc As String, dcicod As String, dcdcod As Integer, clicod As String, ciaa As String, suca As String, tdoca As String, dcacod As String, dadcod As Integer, almcod As String)
        Me._CIAC = ciac
        Me._SUCC = succ
        Me._TDOCC = tdocc
        Me._DCICOD = dcicod
        Me._DCDCOD = dcdcod
        Me._CLICOD = clicod
        Me._CIAA = ciaa
        Me._SUCA = suca
        Me._TDOCA = tdoca
        Me._DCACOD = dcacod
        Me._DADCOD = dadcod
        Me._ALMCOD = almcod
    End Sub

    Public Property CIA_Cliente() As String
        Get
            Return _CIAC
        End Get
        Set(value As String)
            _CIAC = value
        End Set
    End Property

    Public Property SUC_Cliente() As String
        Get
            Return _SUCC
        End Get
        Set(value As String)
            _SUCC = value
        End Set
    End Property

    Public Property TDOC_Cliente() As String
        Get
            Return _TDOCC
        End Get
        Set(value As String)
            _TDOCC = value
        End Set
    End Property

    Public Property DCI_Codigo() As String
        Get
            Return _DCICOD
        End Get
        Set(value As String)
            _DCICOD = value
        End Set
    End Property

    Public Property DCD_Codigo() As Integer
        Get
            Return _DCDCOD
        End Get
        Set(value As Integer)
            _DCDCOD = value
        End Set
    End Property

    Public Property CLI_Codigo() As String
        Get
            Return _CLICOD
        End Get
        Set(value As String)
            _CLICOD = value
        End Set
    End Property

    Public Property CIA_Almacen() As String
        Get
            Return _CIAA
        End Get
        Set(value As String)
            _CIAA = value
        End Set
    End Property

    Public Property SUC_Almacen() As String
        Get
            Return _SUCA
        End Get
        Set(value As String)
            _SUCA = value
        End Set
    End Property

    Public Property TDOC_Almacen() As String
        Get
            Return _TDOCA
        End Get
        Set(value As String)
            _TDOCA = value
        End Set
    End Property

    Public Property DCA_Codigo() As String
        Get
            Return _DCACOD
        End Get
        Set(value As String)
            _DCACOD = value
        End Set
    End Property

    Public Property DAD_Codigo() As Integer
        Get
            Return _DADCOD
        End Get
        Set(value As Integer)
            _DADCOD = value
        End Set
    End Property

    Public Property ALM_Codigo() As String
        Get
            Return _ALMCOD
        End Get
        Set(value As String)
            _ALMCOD = value
        End Set
    End Property

End Class
